home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwlt12.dir / 00025_Script_25 < prev    next >
Text File  |  1994-11-15  |  5KB  |  204 lines

  1. on startMovie
  2.   global inFrame, nowFrame, nowMovie, currWorld, realWorld, currMM
  3.   global lastFrame, dialogOn, jmpFrame, nextLT, prevLT
  4.   cursor 4
  5.   set the preLoadRAM to 420
  6.   set prevLT = "FLWLT11"
  7.   set nextLT = "FLWLT13"
  8.   set dialogOn = FALSE
  9.   set currMM = "FLWMM"
  10.   set nowFrame = "ltexo915000°°°"
  11.   set inFrame = ""
  12.   puppetsprite 9, TRUE
  13.   puppetSprite 11, TRUE
  14.   puppetSprite 12, TRUE
  15.   set the immediate of sprite 11 to TRUE
  16.   set the immediate of sprite 12 to TRUE
  17.   puppetSprite 20, TRUE
  18.   puppetSprite 21, TRUE
  19.   puppetSprite 22, TRUE
  20.   puppetSprite 23, TRUE
  21.   set the immediate of sprite 20 to TRUE
  22.   set the immediate of sprite 23 to TRUE
  23. end startMovie
  24.  
  25. on stepMovie
  26.   global nowFrame,currFrame
  27.   if nowFrame <> currFrame then
  28.     seeAlsoList
  29.     set currFrame = nowFrame
  30.   end if
  31. end stepMovie
  32.  
  33. on stopMovie
  34.   put " " into field "seeAlsoText"
  35.   set the castNum of sprite 21 to 1050
  36.   puppetSprite 21, FALSE
  37.   updateStage
  38. end stopMovie
  39.  
  40. on saveLocals
  41.   global lastFrame, nowFrame, lastMovie, origLocH
  42.   set lastMovie = the movie
  43.   set lastFrame = nowFrame
  44. end saveLocals
  45.  
  46. on ltForStep
  47.   global inFrame, nextLT, ltQT
  48.   puppetSprite 4, FALSE
  49.   set inFrame = ""
  50.   set ltQT = FALSE
  51.   if the frame = 13 then
  52.     go to frame "ltexo919001°°°" of movie nextLT
  53.   else
  54.     go to marker (+1)
  55.     updateStage
  56.   end if
  57. end ltForStep
  58.  
  59. on ltBackStep
  60.   global inFrame, prevLT, ltQT
  61.   puppetSprite 4, FALSE
  62.   set inFrame = ""
  63.   set ltQT = FALSE
  64.   if the frame < 5 then
  65.     go to frame "ltexo911005°°°" of movie prevLT
  66.   else
  67.     go to marker (-1)
  68.     updateStage
  69.   end if
  70. end ltBackStep
  71.  
  72. on checkNav
  73.   if rollover(12) then
  74.     set the castNum of sprite 12 to the number of cast "leftUp"
  75.   else
  76.     set the castNum of sprite 12 to the number of cast "leftRt"
  77.   end if
  78.   
  79.   if rollover(11) then
  80.     set the castNum of sprite 11 to the number of cast "rightUp"
  81.   else
  82.     set the castNum of sprite 11 to the number of cast "rightRt"
  83.   end if
  84.   cursor -1
  85.   updateStage
  86. end checkNav
  87.  
  88. on buttonState
  89.   global FrankNav, bflag, nowFrame, noTx, dialogOn
  90.   
  91.   if dialogOn = FALSE then
  92.     
  93.     --sticking local call here for convenience
  94.     worldLite
  95.     if the mouseV > 200 or bFlag = TRUE then
  96.       set bFlag = FALSE
  97.       doState
  98.     end if
  99.   end if
  100. end buttonState
  101.  
  102. on scrollRight
  103.   if the clickon = 11 then
  104.     sound stop 1
  105.     startTimer
  106.     repeat while the timer < 2
  107.       set the castNum of sprite 11 to the number of cast "rightDn"
  108.       updateStage
  109.     end repeat
  110.     timeRight
  111.     flush
  112.   end if   
  113. end scrollRight
  114.  
  115. on scrollLeft
  116.   if the clickon = 12 then
  117.     sound stop 1
  118.     startTimer
  119.     repeat while the timer < 2
  120.       set the castNum of sprite 12 to the number of cast "leftDn"
  121.       updateStage
  122.     end repeat
  123.     timeLeft
  124.     flush
  125.   end if  
  126. end scrollLeft
  127.  
  128. on timeLeft
  129.   global prevLt
  130.   go to movie prevLT
  131. end timeLeft
  132.  
  133. on timeRight
  134.   global nextLt
  135.   go to movie nextLT
  136. end timeRight
  137.  
  138. on worldLite
  139.   set the castNum of sprite 9 to 2
  140.   if rollover(9) then
  141.     set the castNum of sprite 9 to 24
  142.   end if
  143. end worldLite
  144.  
  145. on rollVLB12
  146.   global currUp1, currUp2, currUp3, currUp4, currUp5
  147.   if the mouseH > 168 and the mouseH < 265 and the mouseV > 84 and the mouseV < 176 then
  148.     set the castNum of sprite 4 to 9
  149.     if the mouseDown then 
  150.       set the castNum of sprite 4 to 4
  151.     end if
  152.   else if the mouseH > 269 and the mouseH < 342 and the mouseV > 130 and the mouseV < 225 then
  153.     set the castNum of sprite 4 to 10
  154.     if the mouseDown then 
  155.       set the castNum of sprite 4 to 4
  156.     end if
  157.   else if the mouseH > 346 and the mouseH < 433 and the mouseV > 75 and the mouseV < 174 then
  158.     set the castNum of sprite 4 to 11
  159.     if the mouseDown then 
  160.       set the castNum of sprite 4 to 4
  161.     end if
  162.   else if the mouseH > 434 and the mouseH < 527 and the mouseV > 140 and the mouseV < 225 then
  163.     set the castNum of sprite 4 to 12
  164.     if the mouseDown then 
  165.       set the castNum of sprite 4 to 4
  166.     end if
  167.   else if the mouseH > 531 and the mouseH < 618 and the mouseV > 75 and the mouseV < 178 then
  168.     set the castNum of sprite 4 to 13
  169.     if the mouseDown then 
  170.       set the castNum of sprite 4 to 4
  171.     end if
  172.   else 
  173.     set the castNum of sprite 4 to 4
  174.   end if
  175.   updateStage
  176. end rollVLB12
  177.  
  178. on jumpVLB12
  179.   global dialogOn
  180.   if dialogOn = FALSE then
  181.     sound stop 1
  182.     if the clickOn < 7 or the clickOn > 23 then
  183.       if the mouseH > 168 and the mouseH < 265 and the mouseV > 84 and the mouseV < 176 then
  184.         puppetSprite 4, FALSE 
  185.         go to frame "ltexo915001°°°"
  186.       else if the mouseH > 269 and the mouseH < 342 and the mouseV > 130 and the mouseV < 225 then
  187.         puppetSprite 4, FALSE
  188.         go to frame "ltexo915002°°°"
  189.       else if the mouseH > 346 and the mouseH < 433 and the mouseV > 75 and the mouseV < 174 then
  190.         puppetSprite 4, FALSE
  191.         go to frame "ltexo915003°°°"
  192.       else if the mouseH > 434 and the mouseH < 527 and the mouseV > 140 and the mouseV < 225 then
  193.         puppetSprite 4, FALSE
  194.         go to frame "ltexo915004°°°"
  195.       else if the mouseH > 531 and the mouseH < 618 and the mouseV > 75 and the mouseV < 178 then
  196.         puppetSprite 4, FALSE
  197.         go to frame "ltexo915005°°°"
  198.       else 
  199.         nothing
  200.       end if
  201.     end if
  202.   end if
  203.   flush
  204. end jumpVLB12